home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Controls
/
Visual Basic Controls.iso
/
vbcontrol
/
esdfeduc
/
supplier.fr_
/
supplier.fr
Wrap
Text File
|
1997-12-14
|
18KB
|
544 lines
VERSION 5.00
Object = "{EB554505-3E59-11D1-9EE4-444553540000}#3.0#0"; "ESDF.OCX"
Begin VB.Form frmSuppliers
Caption = "Suppliers"
ClientHeight = 6300
ClientLeft = 60
ClientTop = 345
ClientWidth = 9225
LinkTopic = "Form2"
ScaleHeight = 6300
ScaleWidth = 9225
StartUpPosition = 3 'Windows Default
Begin ESDF.ColumnNoEdit cneID
Height = 315
Left = 6480
TabIndex = 15
Top = 3360
Visible = 0 'False
Width = 795
_ExtentX = 1402
_ExtentY = 556
DataTable = "Table1"
DataField = "SupplierID"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.CommandButton Command2
Caption = "Input product"
Height = 315
Left = 5040
TabIndex = 14
Top = 5820
Width = 1275
End
Begin VB.CommandButton Command1
Caption = "Products list"
Height = 315
Left = 2400
TabIndex = 13
Top = 5820
Width = 1275
End
Begin ESDF.ColumnEdit cedCountry
Height = 360
Left = 6120
TabIndex = 9
Top = 3000
Width = 1395
_ExtentX = 2461
_ExtentY = 635
DataTable = "Table1"
Browsed = -1 'True
DataField = "Country"
BrowseColWidth = 15
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit10
Height = 360
Left = 1200
TabIndex = 8
Top = 5280
Width = 1035
_ExtentX = 1826
_ExtentY = 635
DataTable = "Table1"
DataField = "Fax"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit8
Height = 375
Left = 4320
TabIndex = 1
Top = 3000
Width = 1635
_ExtentX = 2884
_ExtentY = 661
DataTable = "Table1"
Browsed = -1 'True
DataField = "Phone"
BrowseColWidth = 12
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit7
Height = 375
Left = 5880
TabIndex = 7
Top = 4800
Width = 1095
_ExtentX = 1931
_ExtentY = 661
DataTable = "Table1"
DataField = "PostalCode"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit6
Height = 375
Left = 3540
TabIndex = 6
Top = 4800
Width = 1095
_ExtentX = 1931
_ExtentY = 661
DataTable = "Table1"
DataField = "Region"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit5
Height = 375
Left = 1200
TabIndex = 5
Top = 4800
Width = 1455
_ExtentX = 2566
_ExtentY = 661
DataTable = "Table1"
DataField = "City"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit4
Height = 675
Left = 1200
TabIndex = 4
Top = 4020
Width = 5775
_ExtentX = 10186
_ExtentY = 1191
DataTable = "Table1"
DataField = "Address"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit3
Height = 375
Left = 4860
TabIndex = 3
Top = 3540
Width = 1335
_ExtentX = 2355
_ExtentY = 661
DataTable = "Table1"
DataField = "ContactTitle"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit2
Height = 375
Left = 1560
TabIndex = 2
Top = 3540
Width = 1755
_ExtentX = 3096
_ExtentY = 661
DataTable = "Table1"
DataField = "ContactName"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "Courier New"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ESDF.ColumnEdit ColumnEdit1
Height = 375
Left = 180
TabIndex = 0
Top = 3000
Width = 4035
_ExtentX